500
How can I change the foreground color of the HTML text or caption of the bar in the chart

Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Variant h
		Get ComAddItem of hoItems "Task 1" to h
		Send ComAddBar of hoItems h "Task" "1/2/2001" "1/6/2001" "K1" Nothing
		Set ComItemBar of hoItems h "K1" OLEexBarCaption to "<bgcolor=FF0000> to do </bgcolor>"
		Set ComItemBar of hoItems h "K1" OLEexBarForeColor to 16777215
	Send Destroy to hoItems
End_Procedure
499
How can I assign a tooltip to a bar in the chart

Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Variant h
		Get ComAddItem of hoItems "Task 1" to h
		Send ComAddBar of hoItems h "Task" "1/2/2001" "1/4/2001" "K1" Nothing
		Set ComItemBar of hoItems h "K1" OLEexBarToolTip to "This is a bit of text that's displayed when the cursor hovers the bar"
	Send Destroy to hoItems
End_Procedure
498
How can I vertically align the HTML text or caption of the bar in the chart

Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Variant h
		Get ComAddItem of hoItems "Task 1" to h
		Set ComItemHeight of hoItems h to 32
		Send ComAddBar of hoItems h "Task" "1/2/2001" "1/6/2001" "K1" Nothing
		Set ComItemBar of hoItems h "K1" OLEexBarCaption to "<bgcolor=FF0000> to do </bgcolor>"
		Set ComItemBar of hoItems h "K1" OLEexBarVAlignCaption to 0
	Send Destroy to hoItems
End_Procedure
497
How can I align the HTML text or caption of the bar in the chart

Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Variant h
		Get ComAddItem of hoItems "Task 1" to h
		Send ComAddBar of hoItems h "Task" "1/2/2001" "1/6/2001" "K1" Nothing
		Set ComItemBar of hoItems h "K1" OLEexBarCaption to "<bgcolor=FF0000> to do </bgcolor>"
		Set ComItemBar of hoItems h "K1" OLEexBarHAlignCaption to 0
	Send Destroy to hoItems
End_Procedure
496
How can I assign a text or some HTML caption to a bar in the chart

Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Variant h
		Get ComAddItem of hoItems "Task 1" to h
		Send ComAddBar of hoItems h "Task" "1/2/2001" "1/6/2001" "K1" Nothing
		Set ComItemBar of hoItems h "K1" OLEexBarCaption to " <bgcolor=FF0000>to do</bgcolor> "
	Send Destroy to hoItems
End_Procedure
495
How can I change the ending date of the bar in the chart
Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Variant h
		Get ComAddItem of hoItems "Task 1" to h
		Send ComAddBar of hoItems h "Task" "1/2/2001" "1/4/2001" "K1" Nothing
		Set ComItemBar of hoItems h "K1" OLEexBarEnd to "1/6/2001"
	Send Destroy to hoItems
End_Procedure
494
How can I change the starting date of the bar in the chart
Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Variant h
		Get ComAddItem of hoItems "Task 1" to h
		Send ComAddBar of hoItems h "Task" "1/2/2001" "1/4/2001" "K1" Nothing
		Set ComItemBar of hoItems h "K1" OLEexBarStart to "1/1/2001"
	Send Destroy to hoItems
End_Procedure
493
How can I change the style or the name of the bar in the chart

Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Variant h
		Get ComAddItem of hoItems "Task 1" to h
		Send ComAddBar of hoItems h "Task" "1/2/2001" "1/4/2001" "K1" Nothing
		Set ComItemBar of hoItems h "K1" OLEexBarName to "Progress"
	Send Destroy to hoItems
End_Procedure
492
How can I access properties and methods of the bar in the chart
Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Variant h
		Get ComAddItem of hoItems "Task 1" to h
		Send ComAddBar of hoItems h "Task" "1/2/2001" "1/4/2001" "K1" Nothing
		Set ComItemBar of hoItems h "K1" OLEexBarName to "Progress"
	Send Destroy to hoItems
End_Procedure
491
How can I remove all bars in the item
Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Variant h
		Get ComAddItem of hoItems "Task 1" to h
		Send ComAddBar of hoItems h "Task" "1/2/2001" "1/4/2001" "K1" Nothing
		Send ComClearBars of hoItems h
	Send Destroy to hoItems
End_Procedure
490
How can I remove a bar from the chart
Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Variant h
		Get ComAddItem of hoItems "Task 1" to h
		Send ComAddBar of hoItems h "Task" "1/2/2001" "1/4/2001" "K1" Nothing
		Send ComRemoveBar of hoItems h "K1"
	Send Destroy to hoItems
End_Procedure
489
How can I add a bar and some text inside, in the chart area

Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Task 1")) "Task" "1/2/2001" "1/6/2001" " to do "
	Send Destroy to hoItems
End_Procedure
488
How can I add a bar and some text inside, in the chart area

Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Task 1")) "Task" "1/2/2001" "1/6/2001" "<bgcolor=FF0000> to do </bgcolor>"
	Send Destroy to hoItems
End_Procedure
487
How can I add an anchor or a hyperline in the chart area

Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Task 1")) "" "1/2/2001" "1/14/2001" "just a <a1>link</a>"
	Send Destroy to hoItems
End_Procedure
486
How can I add some text or captions in the chart area

Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Task 1")) "" "1/2/2001" "1/14/2001" "just a <b>caption</b>"
	Send Destroy to hoItems
End_Procedure
485
How can I add a bar in the chart area

Procedure OnCreate
	Forward Send OnCreate
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Task" to Nothing
	Send Destroy to hoColumns
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Task 1")) "Task" "1/2/2001" "1/4/2001" Nothing Nothing
	Send Destroy to hoItems
End_Procedure
484
Is there any option to put a picture or an icon to the thumb part of the scroll bar

Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Set ComScrollPartCaption OLEexHChartScroll OLEexThumbPart to "<img>1</img>"
	Set ComScrollThumbSize OLEexHChartScroll to 24
End_Procedure
483
How can I scroll fast the chart, or page by page

Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Set ComScrollHeight to 20
	Set ComScrollButtonWidth to 20
	Set ComAllowChartScrollPage to True
	Set ComScrollPartCaption OLEexHChartScroll OLEexLeftB5Part to "<img>1</img>"
	Set ComScrollPartCaption OLEexHChartScroll OLEexRightB1Part to "<img>2</img>"
End_Procedure
482
How can I scroll fast the chart, or page by page

Procedure OnCreate
	Forward Send OnCreate
	Set ComScrollButtonWidth to 16
	Set ComAllowChartScrollPage to True
	Set ComScrollPartCaption OLEexHChartScroll OLEexLeftB5Part to "<<"
	Set ComScrollPartCaption OLEexHChartScroll OLEexRightB1Part to ">>"
End_Procedure
481
How can I scroll fast the chart, or page by page

Procedure OnCreate
	Forward Send OnCreate
	Set ComAllowChartScrollPage to True
End_Procedure
480
How can I display years, from 3 to 3

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComUnitWidth of hoChart to 64
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to "<%yyyy%>"
			Set ComUnit of hoLevel to OLEexYear
			Set ComCount of hoLevel to 3
		Send Destroy to hoLevel
	Send Destroy to hoChart1
End_Procedure
479
How can I display years

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComUnitWidth of hoChart to 64
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to "<%yy%>"
			Set ComUnit of hoLevel to OLEexYear
		Send Destroy to hoLevel
	Send Destroy to hoChart1
End_Procedure
478
How can I display years

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComUnitWidth of hoChart to 48
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 0
		Send Destroy to hoLevel
	Send Destroy to hoChart1
End_Procedure
477
How can I display months, from 3 to 3

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComLevelCount of hoChart1 to 2
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComUnitWidth of hoChart2 to 64
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Variant voLevel
		Get ComLevel of hoChart3 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 1
		Send Destroy to hoLevel
	Send Destroy to hoChart3
	Variant voChart4
	Get ComChart to voChart4
	Handle hoChart4
	Get Create (RefClass(cComChart)) to hoChart4
	Set pvComObject of hoChart4 to voChart4
		Variant voLevel1
		Get ComLevel of hoChart4 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to "<%mmmm%>"
			Set ComUnit of hoLevel1 to OLEexMonth
			Set ComCount of hoLevel1 to 3
		Send Destroy to hoLevel1
	Send Destroy to hoChart4
End_Procedure
476
How can I display months

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComUnitWidth of hoChart to 64
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComLevelCount of hoChart1 to 2
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel
		Get ComLevel of hoChart2 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 1
		Send Destroy to hoLevel
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Variant voLevel1
		Get ComLevel of hoChart3 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to "<%mmmm%>/<%yy%>"
			Set ComUnit of hoLevel1 to OLEexMonth
		Send Destroy to hoLevel1
	Send Destroy to hoChart3
End_Procedure
475
How can I display months

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComUnitWidth of hoChart1 to 64
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel
		Get ComLevel of hoChart2 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 1
		Send Destroy to hoLevel
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Variant voLevel1
		Get ComLevel of hoChart3 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to 16
		Send Destroy to hoLevel1
	Send Destroy to hoChart3
End_Procedure
474
How can I display weeks

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComUnitWidth of hoChart1 to 64
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel
		Get ComLevel of hoChart2 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 17
		Send Destroy to hoLevel
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Variant voLevel1
		Get ComLevel of hoChart3 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to 256
		Send Destroy to hoLevel1
	Send Destroy to hoChart3
End_Procedure
473
How can I display weeks

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 17
		Send Destroy to hoLevel
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel1
		Get ComLevel of hoChart2 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to "<%ww%>"
		Send Destroy to hoLevel1
	Send Destroy to hoChart2
End_Procedure
472
How can I display days, from 2 to 2

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 256
		Send Destroy to hoLevel
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel1
		Get ComLevel of hoChart2 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to "<%dd%>"
			Set ComCount of hoLevel1 to 2
		Send Destroy to hoLevel1
	Send Destroy to hoChart2
End_Procedure
471
How can I display days

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 256
		Send Destroy to hoLevel
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel1
		Get ComLevel of hoChart2 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to "<%dd%>"
		Send Destroy to hoLevel1
	Send Destroy to hoChart2
End_Procedure
470
How can I display days

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 256
		Send Destroy to hoLevel
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel1
		Get ComLevel of hoChart2 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to 4096
		Send Destroy to hoLevel1
	Send Destroy to hoChart2
End_Procedure
469
How can I display hours, from 6 to 6

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "00:00"
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComLevelCount of hoChart1 to 2
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel
		Get ComLevel of hoChart2 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 4096
		Send Destroy to hoLevel
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Variant voLevel1
		Get ComLevel of hoChart3 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to "<%hh%>"
			Set ComCount of hoLevel1 to 6
		Send Destroy to hoLevel1
	Send Destroy to hoChart3
End_Procedure
468
How can I display hours

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 4096
		Send Destroy to hoLevel
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel1
		Get ComLevel of hoChart2 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to "<%hh%>"
		Send Destroy to hoLevel1
	Send Destroy to hoChart2
End_Procedure
467
How can I display hours

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 4096
		Send Destroy to hoLevel
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel1
		Get ComLevel of hoChart2 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to 65536
		Send Destroy to hoLevel1
	Send Destroy to hoChart2
End_Procedure
466
How can I display minutes, from 15 to 15

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "00:00"
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComLevelCount of hoChart1 to 2
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel
		Get ComLevel of hoChart2 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 65536
		Send Destroy to hoLevel
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Variant voLevel1
		Get ComLevel of hoChart3 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to "<%nn%>"
			Set ComCount of hoLevel1 to 15
		Send Destroy to hoLevel1
	Send Destroy to hoChart3
End_Procedure
465
How can I display minutes

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 65536
		Send Destroy to hoLevel
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel1
		Get ComLevel of hoChart2 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to "<%nn%>"
		Send Destroy to hoLevel1
	Send Destroy to hoChart2
End_Procedure
464
How can I display minutes

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComUnitWidth of hoChart1 to 64
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel
		Get ComLevel of hoChart2 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 65536
		Send Destroy to hoLevel
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Variant voLevel1
		Get ComLevel of hoChart3 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to 1048576
		Send Destroy to hoLevel1
	Send Destroy to hoChart3
End_Procedure
463
How can I display seconds, from 15 to 15

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "00:00"
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComLevelCount of hoChart1 to 2
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel
		Get ComLevel of hoChart2 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 1048576
		Send Destroy to hoLevel
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Variant voLevel1
		Get ComLevel of hoChart3 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to "<%ss%>"
			Set ComCount of hoLevel1 to 15
		Send Destroy to hoLevel1
	Send Destroy to hoChart3
End_Procedure
462
How can I display seconds

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 1048576
		Send Destroy to hoLevel
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel1
		Get ComLevel of hoChart2 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to "<%ss%>"
		Send Destroy to hoLevel1
	Send Destroy to hoChart2
End_Procedure
461
How can I display seconds

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to 1048576
		Send Destroy to hoLevel
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel1
		Get ComLevel of hoChart2 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComLabel of hoLevel1 to 16777216
		Send Destroy to hoLevel1
	Send Destroy to hoChart2
End_Procedure
460
How can I align the text being shown in the chart's header

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComUnitWidth of hoChart to 64
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComLabel of hoLevel to "<b><%mmmm%></b> <r><%m%>"
			Set ComUnit of hoLevel to OLEexMonth
			Set ComAlignment of hoLevel to OLELeftAlignment
		Send Destroy to hoLevel
	Send Destroy to hoChart1
End_Procedure
459
How can I hide the tooltip being displayed in the chart's header

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Variant voLevel
		Get ComLevel of hoChart 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComToolTip of hoLevel to ""
		Send Destroy to hoLevel
	Send Destroy to hoChart
End_Procedure
458
How can I change the tooltip being displayed in the chart's header

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Variant voLevel
		Get ComLevel of hoChart 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComToolTip of hoLevel to "This is a bit of text that's shown when the cursor hovers the level"
		Send Destroy to hoLevel
	Send Destroy to hoChart
End_Procedure
457
How can I change the visual appearance of the chart's header, where levels are displayed, using your EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComBackColorLevelHeader of hoChart1 to |CI$1000000
	Send Destroy to hoChart1
End_Procedure
456
How can I change the level's foreground color in the chart

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComForeColor of hoLevel to (RGB(255,0,0))
		Send Destroy to hoLevel
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel1
		Get ComLevel of hoChart2 1 to voLevel1
		Handle hoLevel1
		Get Create (RefClass(cComLevel)) to hoLevel1
		Set pvComObject of hoLevel1 to voLevel1
			Set ComForeColor of hoLevel1 to (RGB(0,0,255))
		Send Destroy to hoLevel1
	Send Destroy to hoChart2
End_Procedure
455
How can I change the level's background color in the chart

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLevelCount of hoChart to 2
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Variant voLevel
		Get ComLevel of hoChart1 0 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComBackColor of hoLevel to (RGB(255,0,0))
		Send Destroy to hoLevel
	Send Destroy to hoChart1
End_Procedure
452
How can I add icons or pictures to the scale or zoom area

Procedure OnCreate
	Forward Send OnCreate
	Set ComHTMLPicture "pic1" to "c:\exontrol\images\zipdisk.gif"
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComOverviewHeight of hoChart to 48
		Set ComOverviewVisible of hoChart to True
		Set ComAllowOverviewZoom of hoChart to OLEexZoomOnRClick
		Set ComOverviewZoomCaption of hoChart to "Year|½Year|¼Year|<img>3</img> Week|Third|<img>2</img> Day|<img>pic1</img>|Hour|Min|Sec"
		Set ComLabel of hoChart OLEexYear to ""
		Set ComLabel of hoChart OLEexHalfYear to ""
		Set ComLabel of hoChart OLEexQuarterYear to ""
		Set ComLabel of hoChart OLEexThirdMonth to ""
		Set ComLabel of hoChart OLEexHour to ""
		Set ComLabel of hoChart OLEexMinute to ""
		Set ComLabel of hoChart OLEexSecond to ""
		Set ComOverviewZoomUnit of hoChart to 52
	Send Destroy to hoChart
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "" to Nothing
	Send Destroy to hoColumns
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Set ComCellSingleLine of hoItems (ComAddItem(hoItems,"Right click the Overview area and select a new scale")) 0 to False
	Send Destroy to hoItems
End_Procedure
451
How can I add icons or pictures to the scale or zoom area

Procedure OnCreate
	Forward Send OnCreate
	Set ComHTMLPicture "pic1" to "c:\exontrol\images\zipdisk.gif"
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComOverviewHeight of hoChart to 48
		Set ComOverviewVisible of hoChart to True
		Set ComAllowOverviewZoom of hoChart to OLEexAlwaysZoom
		Set ComOverviewZoomCaption of hoChart to "Year|½Year|¼Year|<img>3</img> Week|Third|<img>2</img> Day|<img>pic1</img>|Hour|Min|Sec"
		Set ComLabel of hoChart OLEexYear to ""
		Set ComLabel of hoChart OLEexHalfYear to ""
		Set ComLabel of hoChart OLEexQuarterYear to ""
		Set ComLabel of hoChart OLEexThirdMonth to ""
		Set ComLabel of hoChart OLEexHour to ""
		Set ComLabel of hoChart OLEexMinute to ""
		Set ComLabel of hoChart OLEexSecond to ""
		Set ComOverviewZoomUnit of hoChart to 52
	Send Destroy to hoChart
End_Procedure
450
How can I change the width of the unit in the scale or zoom

Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComOverviewVisible of hoChart to True
		Set ComAllowOverviewZoom of hoChart to OLEexAlwaysZoom
		Set ComOverviewZoomCaption of hoChart to "Year|½Year|¼Year|<img>3</img>|Third|<img>2</img>|<img>1</img>|Hour|Min|Sec"
		Set ComLabel of hoChart OLEexYear to ""
		Set ComLabel of hoChart OLEexHalfYear to ""
		Set ComLabel of hoChart OLEexQuarterYear to ""
		Set ComLabel of hoChart OLEexThirdMonth to ""
		Set ComLabel of hoChart OLEexHour to ""
		Set ComLabel of hoChart OLEexMinute to ""
		Set ComLabel of hoChart OLEexSecond to ""
		Set ComOverviewZoomUnit of hoChart to 24
	Send Destroy to hoChart
End_Procedure
449
How can I a scale or zoom of the chart, when right clicking the chart's header

Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComOverviewVisible of hoChart to True
		Set ComAllowOverviewZoom of hoChart to OLEexZoomOnRClick
		Set ComOverviewZoomCaption of hoChart to "Year|½Year|¼Year|<img>3</img>Month|Third|<img>2</img>Week|<img>1</img>Day|Hour|Min|Sec"
		Set ComLabel of hoChart OLEexYear to ""
		Set ComLabel of hoChart OLEexHalfYear to ""
		Set ComLabel of hoChart OLEexQuarterYear to ""
		Set ComLabel of hoChart OLEexThirdMonth to ""
		Set ComLabel of hoChart OLEexHour to ""
		Set ComLabel of hoChart OLEexMinute to ""
		Set ComLabel of hoChart OLEexSecond to ""
		Set ComOverviewZoomUnit of hoChart to 64
	Send Destroy to hoChart
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "" to Nothing
	Send Destroy to hoColumns
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Set ComCellSingleLine of hoItems (ComAddItem(hoItems,"Right click the Overview area and select a new scale")) 0 to False
	Send Destroy to hoItems
End_Procedure
448
How can I a customize the scale or zoom of the chart

Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComOverviewVisible of hoChart to True
		Set ComAllowOverviewZoom of hoChart to OLEexAlwaysZoom
		Set ComOverviewZoomCaption of hoChart to "Year|½Year|¼Year|<img>3</img>Month|Third|<img>2</img>Week|<img>1</img>Day|Hour|Min|Sec"
		Set ComLabel of hoChart OLEexYear to ""
		Set ComLabel of hoChart OLEexHalfYear to ""
		Set ComLabel of hoChart OLEexQuarterYear to ""
		Set ComLabel of hoChart OLEexThirdMonth to ""
		Set ComLabel of hoChart OLEexHour to ""
		Set ComLabel of hoChart OLEexMinute to ""
		Set ComLabel of hoChart OLEexSecond to ""
		Set ComOverviewZoomUnit of hoChart to 64
	Send Destroy to hoChart
End_Procedure
447
How can I a scale or zoom the chart at runtime

Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComOverviewVisible of hoChart to True
		Set ComAllowOverviewZoom of hoChart to OLEexAlwaysZoom
		Set ComOverviewZoomCaption of hoChart to "½Year|¼Year|<img>3</img>Month|Third|<img>2</img>Week|<img>1</img>Day|Hour|Min|Sec"
	Send Destroy to hoChart
End_Procedure
446
How can I a scale or zoom the chart at runtime

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComOverviewVisible of hoChart to True
		Set ComAllowOverviewZoom of hoChart to OLEexAlwaysZoom
		Set ComOverviewZoomUnit of hoChart to 24
	Send Destroy to hoChart
End_Procedure
445
How can I a programmatically select a date
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComMarkSelectDateColor of hoChart to (RGB(255,0,0))
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComFirstVisibleDate of hoChart1 to "1/1/2001"
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComSelectDate of hoChart2 "1/2/2001" to True
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Set ComSelectDate of hoChart3 "1/5/2001" to True
	Send Destroy to hoChart3
	Variant voChart4
	Get ComChart to voChart4
	Handle hoChart4
	Get Create (RefClass(cComChart)) to hoChart4
	Set pvComObject of hoChart4 to voChart4
		Set ComSelectLevel of hoChart4 to 0
	Send Destroy to hoChart4
End_Procedure
444
How can I change the color to select a date, when clicking the chart's header
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComBackColor of hoChart to (RGB(255,255,255))
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComMarkSelectDateColor of hoChart1 to (RGB(255,0,0))
	Send Destroy to hoChart1
End_Procedure
443
How can I enable or disable selecting a date, when clicking the chart's header
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComBackColor of hoChart to (RGB(255,255,255))
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComMarkSelectDateColor of hoChart1 to (RGB(255,255,255))
	Send Destroy to hoChart1
End_Procedure
442
How can I specify the color or the stype for non working hours

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComUnitScale of hoChart to OLEexHour
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComPaneWidth of hoChart1 False to 0
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComNonworkingHours of hoChart2 to 127
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Set ComNonworkingHoursPattern of hoChart3 to OLEexPatternYard
	Send Destroy to hoChart3
	Variant voChart4
	Get ComChart to voChart4
	Handle hoChart4
	Get Create (RefClass(cComChart)) to hoChart4
	Set pvComObject of hoChart4 to voChart4
		Set ComNonworkingHoursColor of hoChart4 to (RGB(255,0,0))
	Send Destroy to hoChart4
End_Procedure
441
How can I specify the pattern or the stype for non working hours

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComUnitScale of hoChart to OLEexHour
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComPaneWidth of hoChart1 False to 0
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComNonworkingHours of hoChart2 to 127
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Set ComNonworkingHoursPattern of hoChart3 to OLEexPatternDiagCross
	Send Destroy to hoChart3
End_Procedure
440
How can I specify the non working hours

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComUnitScale of hoChart to OLEexHour
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComPaneWidth of hoChart1 False to 0
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComNonworkingHours of hoChart2 to 127
	Send Destroy to hoChart2
End_Procedure
439
How can I get the index of the level from the point or cursor
Procedure OnCreate
	Forward Send OnCreate
	Variant v
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Get ComLevelFromPoint of hoChart 0 0 to v
	Send Destroy to hoChart
	Variant var_LevelFromPoint
	Move v to var_LevelFromPoint
End_Procedure
438
How can I get the link from the point or cursor
Procedure OnCreate
	Forward Send OnCreate
	Variant v
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Get ComLinkFromPoint of hoChart 0 0 to v
	Send Destroy to hoChart
	Variant var_LinkFromPoint
	Move v to var_LinkFromPoint
End_Procedure
437
How can I check or verify if a date is a non working day
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Variant vColumnCaption
			Variant voChart1
			Get ComChart to voChart1
			Handle hoChart1
			Get Create (RefClass(cComChart)) to hoChart1
			Set pvComObject of hoChart1 to voChart1
				Get ComIsNonworkingDate of hoChart1 "1/1/2001" to vColumnCaption
			Send Destroy to hoChart1
		Get ComAdd of hoColumns vColumnCaption to Nothing
	Send Destroy to hoColumns
End_Procedure
436
How can I check or verify if a date fits the chart's visible area
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Variant vColumnCaption
			Variant voChart1
			Get ComChart to voChart1
			Handle hoChart1
			Get Create (RefClass(cComChart)) to hoChart1
			Set pvComObject of hoChart1 to voChart1
				Get ComIsDateVisible of hoChart1 "1/1/2001" to vColumnCaption
			Send Destroy to hoChart1
		Get ComAdd of hoColumns vColumnCaption to Nothing
	Send Destroy to hoColumns
End_Procedure
435
How can I add a remove all non working days
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComNonworkingDays of hoChart to 0
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComFirstVisibleDate of hoChart1 to "1/1/2001"
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Send ComAddNonworkingDate of hoChart2 "1/1/2001"
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Send ComClearNonworkingDates of hoChart3
	Send Destroy to hoChart3
End_Procedure
434
How can I add a remove a non working days
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComNonworkingDays of hoChart to 0
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComFirstVisibleDate of hoChart1 to "1/1/2001"
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Send ComAddNonworkingDate of hoChart2 "1/1/2001"
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Send ComRemoveNonworkingDate of hoChart3 "1/1/2001"
	Send Destroy to hoChart3
End_Procedure
433
How can I add a custom non working days

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComNonworkingDays of hoChart to 0
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComFirstVisibleDate of hoChart1 to "1/1/2001"
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Send ComAddNonworkingDate of hoChart2 "1/1/2001"
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Send ComAddNonworkingDate of hoChart3 "1/5/2001"
	Send Destroy to hoChart3
End_Procedure
432
How can hide the non working days
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComShowNonworkingDates of hoChart to False
	Send Destroy to hoChart
End_Procedure
431
How can hide the non working days
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComNonworkingDays of hoChart to 0
	Send Destroy to hoChart
End_Procedure
430
How can I change the width of the links between bars

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLinksStyle of hoChart to OLEexLinkSolid
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComLinksWidth of hoChart1 to 2
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComFirstVisibleDate of hoChart2 to "1/1/2001"
	Send Destroy to hoChart2
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Column" to Nothing
	Send Destroy to hoColumns
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 1")) "Task" "1/2/2001" "1/4/2001" "B1" Nothing
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 2")) "Task" "1/6/2001" "1/14/2001" "B2" Nothing
		Send ComAddLink of hoItems "L1" (ComFindItem(hoItems,"Item 1",0,Nothing)) "B1" (ComFindItem(hoItems,"Item 2",0,Nothing)) "B2"
	Send Destroy to hoItems
End_Procedure
429
How can I change the style for the links between bars

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLinksStyle of hoChart to OLEexLinkDashDotDot
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComFirstVisibleDate of hoChart1 to "1/1/2001"
	Send Destroy to hoChart1
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Column" to Nothing
	Send Destroy to hoColumns
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 1")) "Task" "1/2/2001" "1/4/2001" "B1" Nothing
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 2")) "Task" "1/6/2001" "1/14/2001" "B2" Nothing
		Send ComAddLink of hoItems "L1" (ComFindItem(hoItems,"Item 1",0,Nothing)) "B1" (ComFindItem(hoItems,"Item 2",0,Nothing)) "B2"
	Send Destroy to hoItems
End_Procedure
428
How can I change the color for the links between bars

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComLinksColor of hoChart to (RGB(255,0,0))
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComFirstVisibleDate of hoChart1 to "1/1/2001"
	Send Destroy to hoChart1
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Column" to Nothing
	Send Destroy to hoColumns
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 1")) "Task" "1/2/2001" "1/4/2001" "B1" Nothing
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 2")) "Task" "1/6/2001" "1/14/2001" "B2" Nothing
		Send ComAddLink of hoItems "L1" (ComFindItem(hoItems,"Item 1",0,Nothing)) "B1" (ComFindItem(hoItems,"Item 2",0,Nothing)) "B2"
	Send Destroy to hoItems
End_Procedure
427
How can I hide the links between bars
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to "1/1/2001"
	Send Destroy to hoChart
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Column" to Nothing
	Send Destroy to hoColumns
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 1")) "Task" "1/2/2001" "1/4/2001" "B1" Nothing
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 2")) "Task" "1/6/2001" "1/14/2001" "B2" Nothing
		Send ComAddLink of hoItems "L1" (ComFindItem(hoItems,"Item 1",0,Nothing)) "B1" (ComFindItem(hoItems,"Item 2",0,Nothing)) "B2"
	Send Destroy to hoItems
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComShowLinks of hoChart1 to False
	Send Destroy to hoChart1
End_Procedure
426
How can I display some grid line in the overview area

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComOverviewVisible of hoChart to True
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComOverviewLevelLines of hoChart1 to 0
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComFirstVisibleDate of hoChart2 to "1/1/2001"
	Send Destroy to hoChart2
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Column" to Nothing
	Send Destroy to hoColumns
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 1")) "Task" "1/2/2001" "1/4/2001" Nothing Nothing
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 1")) "Task" "1/6/2001" "1/14/2001" Nothing Nothing
	Send Destroy to hoItems
End_Procedure
425
How do I change the tooltip when the cursor hovers the overview area

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComOverviewVisible of hoChart to True
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComOverviewToolTip of hoChart1 to "Tooltip on the overview"
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComFirstVisibleDate of hoChart2 to "1/1/2001"
	Send Destroy to hoChart2
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Column" to Nothing
	Send Destroy to hoColumns
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 1")) "Task" "1/2/2001" "1/4/2001" Nothing Nothing
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 1")) "Task" "1/6/2001" "1/14/2001" Nothing Nothing
	Send Destroy to hoItems
End_Procedure
424
How do I remove the tooltip when the cursor hovers the overview area
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComOverviewVisible of hoChart to True
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComOverviewToolTip of hoChart1 to ""
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComFirstVisibleDate of hoChart2 to "1/1/2001"
	Send Destroy to hoChart2
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Column" to Nothing
	Send Destroy to hoColumns
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 1")) "Task" "1/2/2001" "1/4/2001" Nothing Nothing
	Send Destroy to hoItems
End_Procedure
423
How do I change the selection color in the overview area

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComOverviewVisible of hoChart to True
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComOverviewSelBackColor of hoChart1 to (RGB(255,0,0))
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComFirstVisibleDate of hoChart2 to "1/1/2001"
	Send Destroy to hoChart2
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Column" to Nothing
	Send Destroy to hoColumns
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 1")) "Task" "1/2/2001" "1/4/2001" Nothing Nothing
	Send Destroy to hoItems
End_Procedure
422
How do I change the background color for the overview area

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComOverviewVisible of hoChart to True
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComOverviewBackColor of hoChart1 to (RGB(255,0,0))
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComFirstVisibleDate of hoChart2 to "1/1/2001"
	Send Destroy to hoChart2
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Column" to Nothing
	Send Destroy to hoColumns
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 1")) "Task" "1/2/2001" "1/4/2001" Nothing Nothing
	Send Destroy to hoItems
End_Procedure
421
How do I specify the height for the overview area

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComOverviewVisible of hoChart to True
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComOverviewHeight of hoChart1 to 16
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComFirstVisibleDate of hoChart2 to "1/1/2001"
	Send Destroy to hoChart2
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Column" to Nothing
	Send Destroy to hoColumns
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 1")) "Task" "1/2/2001" "1/4/2001" Nothing Nothing
	Send Destroy to hoItems
End_Procedure
420
How do I show or hide the control's overview area

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComOverviewVisible of hoChart to True
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComFirstVisibleDate of hoChart1 to "1/1/2001"
	Send Destroy to hoChart1
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Column" to Nothing
	Send Destroy to hoColumns
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 1")) "Task" "1/2/2001" "1/4/2001" Nothing Nothing
	Send Destroy to hoItems
End_Procedure
419
How do I get the bar from the point or cursor
Procedure OnCreate
	Forward Send OnCreate
	Variant v
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Get ComBarFromPoint of hoChart 0 0 to v
	Send Destroy to hoChart
	Variant var_BarFromPoint
	Move v to var_BarFromPoint
End_Procedure
418
How do I specify the color of pattern for non working days

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComNonworkingDays of hoChart to 66
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComNonworkingDaysPattern of hoChart1 to OLEexPatternVertical
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComNonworkingDaysColor of hoChart2 to (RGB(255,0,0))
	Send Destroy to hoChart2
End_Procedure
417
How do I specify the type of pattern for non working days

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComNonworkingDays of hoChart to 66
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComNonworkingDaysPattern of hoChart1 to OLEexPatternBrick
	Send Destroy to hoChart1
End_Procedure
416
How do I specify the non working days

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComNonworkingDays of hoChart to 66
	Send Destroy to hoChart
End_Procedure
415
How do I specify the non working days
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComNonworkingDays of hoChart to 66
	Send Destroy to hoChart
End_Procedure
414
How do I add a predefined bar

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Variant voBars
		Get ComBars of hoChart to voBars
		Handle hoBars
		Get Create (RefClass(cComBars)) to hoBars
		Set pvComObject of hoBars to voBars
			Variant voBar
			Get ComAdd of hoBars "CustomBar" to voBar
			Handle hoBar
			Get Create (RefClass(cComBar)) to hoBar
			Set pvComObject of hoBar to voBar
				Set ComColor of hoBar to (RGB(255,0,0))
			Send Destroy to hoBar
		Send Destroy to hoBars
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComFirstVisibleDate of hoChart1 to "1/1/2001"
	Send Destroy to hoChart1
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns "Column" to Nothing
	Send Destroy to hoColumns
	Variant voItems
	Get ComItems to voItems
	Handle hoItems
	Get Create (RefClass(cComItems)) to hoItems
	Set pvComObject of hoItems to voItems
		Send ComAddBar of hoItems (ComAddItem(hoItems,"Item 1")) "CustomBar" "1/2/2001" "1/4/2001" Nothing Nothing
	Send Destroy to hoItems
End_Procedure
413
How do I change the unit being displayed in the chart

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComPaneWidth of hoChart False to 0
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComUnitScale of hoChart1 to OLEexWeek
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComUnitWidth of hoChart2 to 64
	Send Destroy to hoChart2
End_Procedure
412
How do I specify the prodefined tooltip being shown on the chart's header, when Zoom method is used

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComPaneWidth of hoChart False to 0
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComLevelCount of hoChart1 to 2
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComLabel of hoChart2 OLEexHalfYear to ""
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Set ComLabel of hoChart3 OLEexQuarterYear to ""
	Send Destroy to hoChart3
	Variant voChart4
	Get ComChart to voChart4
	Handle hoChart4
	Get Create (RefClass(cComChart)) to hoChart4
	Set pvComObject of hoChart4 to voChart4
		Set ComLabel of hoChart4 OLEexMonth to "<%m3%>"
	Send Destroy to hoChart4
	Variant voChart5
	Get ComChart to voChart5
	Handle hoChart5
	Get Create (RefClass(cComChart)) to hoChart5
	Set pvComObject of hoChart5 to voChart5
		Set ComLabelToolTip of hoChart5 OLEexMonth to "Tooltip: <%mmmm%>"
	Send Destroy to hoChart5
	Variant voChart6
	Get ComChart to voChart6
	Handle hoChart6
	Get Create (RefClass(cComChart)) to hoChart6
	Set pvComObject of hoChart6 to voChart6
		Send ComZoom of hoChart6 "1/1/2007" "1/1/2008" Nothing
	Send Destroy to hoChart6
	Variant voChart7
	Get ComChart to voChart7
	Handle hoChart7
	Get Create (RefClass(cComChart)) to hoChart7
	Set pvComObject of hoChart7 to voChart7
		Set ComFirstVisibleDate of hoChart7 to "1/1/2007"
	Send Destroy to hoChart7
End_Procedure
411
How do I specify the prodefined labels being displayed on the chart, when Zoom method is used

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComPaneWidth of hoChart False to 0
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComLevelCount of hoChart1 to 2
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComLabel of hoChart2 OLEexHalfYear to ""
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Set ComLabel of hoChart3 OLEexQuarterYear to ""
	Send Destroy to hoChart3
	Variant voChart4
	Get ComChart to voChart4
	Handle hoChart4
	Get Create (RefClass(cComChart)) to hoChart4
	Set pvComObject of hoChart4 to voChart4
		Set ComLabel of hoChart4 OLEexMonth to "<%m3%>"
	Send Destroy to hoChart4
	Variant voChart5
	Get ComChart to voChart5
	Handle hoChart5
	Get Create (RefClass(cComChart)) to hoChart5
	Set pvComObject of hoChart5 to voChart5
		Send ComZoom of hoChart5 "1/1/2007" "1/1/2008" Nothing
	Send Destroy to hoChart5
	Variant voChart6
	Get ComChart to voChart6
	Handle hoChart6
	Get Create (RefClass(cComChart)) to hoChart6
	Set pvComObject of hoChart6 to voChart6
		Set ComFirstVisibleDate of hoChart6 to "1/1/2007"
	Send Destroy to hoChart6
End_Procedure
410
How do I scale or zoom the chart to a specified range of date
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComPaneWidth of hoChart False to 0
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComLevelCount of hoChart1 to 2
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Set ComLabel of hoChart2 OLEexHalfYear to ""
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Set ComLabel of hoChart3 OLEexQuarterYear to ""
	Send Destroy to hoChart3
	Variant voChart4
	Get ComChart to voChart4
	Handle hoChart4
	Get Create (RefClass(cComChart)) to hoChart4
	Set pvComObject of hoChart4 to voChart4
		Set ComLabel of hoChart4 OLEexMonth to "<%m3%>"
	Send Destroy to hoChart4
	Variant voChart5
	Get ComChart to voChart5
	Handle hoChart5
	Get Create (RefClass(cComChart)) to hoChart5
	Set pvComObject of hoChart5 to voChart5
		Send ComZoom of hoChart5 "1/1/2007" "1/1/2008" Nothing
	Send Destroy to hoChart5
	Variant voChart6
	Get ComChart to voChart6
	Handle hoChart6
	Get Create (RefClass(cComChart)) to hoChart6
	Set pvComObject of hoChart6 to voChart6
		Set ComFirstVisibleDate of hoChart6 to "1/1/2007"
	Send Destroy to hoChart6
End_Procedure
409
How do I scale or zoom the chart to a specified range of date
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComPaneWidth of hoChart False to 0
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComLevelCount of hoChart1 to 2
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Send ComZoom of hoChart2 "1/1/2007" "7/1/2007" Nothing
	Send Destroy to hoChart2
	Variant voChart3
	Get ComChart to voChart3
	Handle hoChart3
	Get Create (RefClass(cComChart)) to hoChart3
	Set pvComObject of hoChart3 to voChart3
		Set ComFirstVisibleDate of hoChart3 to "1/1/2007"
	Send Destroy to hoChart3
End_Procedure
408
How do I find the next date or previous date
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComFirstVisibleDate of hoChart to (ComNextDate(hoChart,"1/1/2002",OLEexDay,1))
	Send Destroy to hoChart
End_Procedure
407
How can I change the color for the grid lines in the chart

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComDrawGridLines of hoChart to OLEexAllLines
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComLevelCount of hoChart1 to 2
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel
		Get ComLevel of hoChart2 1 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComDrawGridLines of hoLevel to True
			Set ComGridLineColor of hoLevel to (RGB(255,0,0))
		Send Destroy to hoLevel
	Send Destroy to hoChart2
End_Procedure
406
How can I draw, show or hide the grid lines in the chart

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComDrawGridLines of hoChart to OLEexAllLines
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComLevelCount of hoChart1 to 2
	Send Destroy to hoChart1
	Variant voChart2
	Get ComChart to voChart2
	Handle hoChart2
	Get Create (RefClass(cComChart)) to hoChart2
	Set pvComObject of hoChart2 to voChart2
		Variant voLevel
		Get ComLevel of hoChart2 1 to voLevel
		Handle hoLevel
		Get Create (RefClass(cComLevel)) to hoLevel
		Set pvComObject of hoLevel to voLevel
			Set ComDrawGridLines of hoLevel to True
		Send Destroy to hoLevel
	Send Destroy to hoChart2
End_Procedure
405
How do I change the color to highlight the today in the chart

Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComMarkTodayColor of hoChart to (RGB(255,0,0))
	Send Destroy to hoChart
End_Procedure
404
How do I hide or stop highlighting the today area in the chart
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComBackColor of hoChart to (RGB(255,255,255))
	Send Destroy to hoChart
	Variant voChart1
	Get ComChart to voChart1
	Handle hoChart1
	Get Create (RefClass(cComChart)) to hoChart1
	Set pvComObject of hoChart1 to voChart1
		Set ComMarkTodayColor of hoChart1 to (RGB(255,255,255))
	Send Destroy to hoChart1
End_Procedure
403
Is there any function to get the date in the format that I use for levels, to layout my chart's header
Procedure OnCreate
	Forward Send OnCreate
	Variant v
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Get ComFormatDate of hoChart "1/1/2002" "<%yyyy%> <%mmmm%> <%d%> <%dddd%>" to v
	Send Destroy to hoChart
	Variant h
	Move v to h
	Variant voColumns
	Get ComColumns to voColumns
	Handle hoColumns
	Get Create (RefClass(cComColumns)) to hoColumns
	Set pvComObject of hoColumns to voColumns
		Get ComAdd of hoColumns h to Nothing
	Send Destroy to hoColumns
End_Procedure
402
How can I get the date from the point, cursor
// Occurs when the user moves the mouse.
Procedure OnComMouseMove Short   llButton Short   llShift OLE_XPOS_PIXELS   llX OLE_YPOS_PIXELS   llY
	Forward Send OnComMouseMove llButton llShift llX llY
	Variant v
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Get ComDateFromPoint of hoChart -1 -1 to v
	Send Destroy to hoChart
	Showln v
End_Procedure


401
How can I show or hide the small ticker that shows up when the cursor hovers the chart area
Procedure OnCreate
	Forward Send OnCreate
	Variant voChart
	Get ComChart to voChart
	Handle hoChart
	Get Create (RefClass(cComChart)) to hoChart
	Set pvComObject of hoChart to voChart
		Set ComDrawDateTicker of hoChart to False
	Send Destroy to hoChart
End_Procedure